
' Theremino Automation demo program

' Demonstrating nested GoSub and Return 

Label Loop1
	Print "Loop 1"
	Slot(1) = 1000
	Slot(1) = 0
	Slot(2) = 1000
	Slot(2) = 0
	Wait Seconds 1
	GoSub sub1
	Beep	
	Wait Seconds 1
	Slot(3) = 1000
	Slot(3) = 0
	Slot(4) = 1000
	Slot(4) = 0
GoTo Loop1

Label sub1
	Print "Sub 1"
	Wait Seconds 1
	GoSub sub2
	Beep
	Wait Seconds 1
Return

Label Sub2
	Print "Sub 2"
	Wait Seconds 1
Return
